home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_99577.txt < prev    next >
Text File  |  1990-08-14  |  4KB  |  151 lines

  1. -- card: 99577 from stack: in
  2. -- bmap block id: 99627
  3. -- flags: 4000
  4. -- background id: 13605
  5. -- name: CD Lists
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=21 top=153 right=184 bottom=131
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Co-requisites
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   lock screen
  23.   set the scroll of card field "Course Pool" to 0
  24.   go to card "CD Lists2"
  25.   if card field "Course Name" of first card of this background is not empty then
  26.     put card field "Course Name" of first card of this background & " - " & card field "Grade" of first card of this background into field "Working On"
  27.   else put "(not set)" into field "Working On"
  28.   unlock screen
  29. end mouseUp
  30.  
  31.  
  32.  
  33. -- part 2 (button)
  34. -- low flags: 00
  35. -- high flags: 0000
  36. -- rect: left=21 top=202 right=233 bottom=131
  37. -- title width / last selected line: 0
  38. -- icon id / first selected line: 0 / 0
  39. -- text alignment: 1
  40. -- font id: 0
  41. -- text size: 12
  42. -- style flags: 0
  43. -- line height: 16
  44. -- part name: Rooms
  45. ----- HyperTalk script -----
  46. on mouseUp
  47.   lock screen
  48.   set the scroll of card field "Course Pool" to 0
  49.   go to card "CD Lists3"
  50.   if card field "Course Name" of first card of this background is not empty then
  51.     put card field "Course Name" of first card of this background & " - " & card field "Grade" of first card of this background into field "Working On"
  52.   else put "(not set)" into field "Working On"
  53.   unlock screen
  54. end mouseUp
  55.  
  56.  
  57.  
  58. -- part 3 (button)
  59. -- low flags: 00
  60. -- high flags: 0000
  61. -- rect: left=21 top=251 right=282 bottom=131
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 0 / 0
  64. -- text alignment: 1
  65. -- font id: 0
  66. -- text size: 12
  67. -- style flags: 0
  68. -- line height: 16
  69. -- part name: Programs
  70. ----- HyperTalk script -----
  71. on mouseUp
  72.   lock screen
  73.   set the scroll of card field "Course Pool" to 0
  74.   go to card "CD Lists4"
  75.   if card field "Course Name" of first card of this background is not empty then
  76.     put card field "Course Name" of first card of this background & " - " & card field "Grade" of first card of this background into field "Working On"
  77.   else put "(not set)" into field "Working On"
  78.   unlock screen
  79. end mouseUp
  80.  
  81.  
  82.  
  83. -- part 4 (field)
  84. -- low flags: 01
  85. -- high flags: 0002
  86. -- rect: left=146 top=110 right=272 bottom=306
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 0 / 0
  89. -- text alignment: 0
  90. -- font id: 3
  91. -- text size: 9
  92. -- style flags: 0
  93. -- line height: 16
  94. -- part name: Prerequisites
  95.  
  96.  
  97. -- part 5 (field)
  98. -- low flags: 01
  99. -- high flags: 0007
  100. -- rect: left=322 top=110 right=272 bottom=482
  101. -- title width / last selected line: 0
  102. -- icon id / first selected line: 0 / 0
  103. -- text alignment: 0
  104. -- font id: 3
  105. -- text size: 9
  106. -- style flags: 0
  107. -- line height: 16
  108. -- part name: Course Pool
  109.  
  110.  
  111. -- part contents for background part 8
  112. ----- text -----
  113. Biology - 12
  114.  
  115. -- part contents for card part 4
  116. ----- text -----
  117. None
  118.  
  119. -- part contents for card part 5
  120. ----- text -----
  121. None
  122. Algebra - 11
  123. Algebra - 12
  124. Biology - 11
  125. Biology - 12
  126. Biology Lab - 11
  127. Bookkeeping - 12
  128. Chemistry - 11
  129. Chemistry - 12
  130. Computer Science - 11
  131. Drafting - 12
  132. English - 11
  133. English - 12
  134. French - 11
  135. French - 12
  136. Geography - 12
  137. History - 11
  138. Industrial Education - 11
  139. Math - 11
  140. Math - 12
  141. Metalwork - 12
  142. Physical Education - 11
  143. Physical Education - 12
  144. Physics - 11
  145. Physics - 12
  146. Science - 12
  147. Shorthand - 11
  148. Typing - 11
  149. Typing - 12
  150. Woodworking - 11
  151. Woodworking - 12